home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / clansb.z / clansb
Text File  |  1996-03-14  |  3KB  |  133 lines
  1.  
  2.  
  3.  
  4. CCCCLLLLAAAANNNNSSSSBBBB((((3333FFFF))))                                                          CCCCLLLLAAAANNNNSSSSBBBB((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      CLANSB - return the value of the one norm, or the Frobenius norm, or the
  10.      infinity norm, or the element of largest absolute value of an n by n
  11.      symmetric band matrix A, with k super-diagonals
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      REAL FUNCTION CLANSB( NORM, UPLO, N, K, AB, LDAB, WORK )
  15.  
  16.          CHARACTER NORM, UPLO
  17.  
  18.          INTEGER   K, LDAB, N
  19.  
  20.          REAL      WORK( * )
  21.  
  22.          COMPLEX   AB( LDAB, * )
  23.  
  24. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  25.      CLANSB  returns the value of the one norm,  or the Frobenius norm, or the
  26.      infinity norm,  or the element of  largest absolute value  of an n by n
  27.      symmetric band matrix A,  with k super-diagonals.
  28.  
  29.  
  30. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  31.      CLANSB returns the value
  32.  
  33.         CLANSB = ( max(abs(A(i,j))), NORM = 'M' or 'm'
  34.                  (
  35.                  ( norm1(A),         NORM = '1', 'O' or 'o'
  36.                  (
  37.                  ( normI(A),         NORM = 'I' or 'i'
  38.                  (
  39.                  ( normF(A),         NORM = 'F', 'f', 'E' or 'e'
  40.  
  41.      where  norm1  denotes the  one norm of a matrix (maximum column sum),
  42.      normI  denotes the  infinity norm  of a matrix  (maximum row sum) and
  43.      normF  denotes the  Frobenius norm of a matrix (square root of sum of
  44.      squares).  Note that  max(abs(A(i,j)))  is not a  matrix norm.
  45.  
  46.  
  47. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  48.      NORM    (input) CHARACTER*1
  49.              Specifies the value to be returned in CLANSB as described above.
  50.  
  51.      UPLO    (input) CHARACTER*1
  52.              Specifies whether the upper or lower triangular part of the band
  53.              matrix A is supplied.  = 'U':  Upper triangular part is supplied
  54.              = 'L':  Lower triangular part is supplied
  55.  
  56.      N       (input) INTEGER
  57.              The order of the matrix A.  N >= 0.  When N = 0, CLANSB is set to
  58.              zero.
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. CCCCLLLLAAAANNNNSSSSBBBB((((3333FFFF))))                                                          CCCCLLLLAAAANNNNSSSSBBBB((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      K       (input) INTEGER
  75.              The number of super-diagonals or sub-diagonals of the band matrix
  76.              A.  K >= 0.
  77.  
  78.      AB      (input) COMPLEX array, dimension (LDAB,N)
  79.              The upper or lower triangle of the symmetric band matrix A,
  80.              stored in the first K+1 rows of AB.  The j-th column of A is
  81.              stored in the j-th column of the array AB as follows:  if UPLO =
  82.              'U', AB(k+1+i-j,j) = A(i,j) for max(1,j-k)<=i<=j; if UPLO = 'L',
  83.              AB(1+i-j,j)   = A(i,j) for j<=i<=min(n,j+k).
  84.  
  85.      LDAB    (input) INTEGER
  86.              The leading dimension of the array AB.  LDAB >= K+1.
  87.  
  88.      WORK    (workspace) REAL array, dimension (LWORK),
  89.              where LWORK >= N when NORM = 'I' or '1' or 'O'; otherwise, WORK
  90.              is not referenced.
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.